inherited frmBairros: TfrmBairros
  Left = 535
  Top = 222
  Width = 719
  Height = 479
  AutoScroll = True
  Caption = ''
  Font.Name = 'Verdana'
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Top = 408
    Width = 711
  end
  inherited Panel2: TPanel
    Width = 711
    Height = 408
    inherited Panel3: TPanel
      Width = 709
      Caption = 'Bairros'
      inherited GroupBox1: TGroupBox
        Left = 625
        Width = 80
        inherited edtRegistro: TEdit
          Width = 80
        end
      end
    end
    inherited Panel4: TPanel
      Width = 709
      Height = 366
      Font.Name = 'Verdana'
      ParentCtl3D = False
      ParentFont = False
      object Label1: TLabel [0]
        Left = 16
        Top = 16
        Width = 40
        Height = 13
        Caption = 'C'#243'digo'
        FocusControl = edtCodigo
      end
      object Label2: TLabel [1]
        Left = 168
        Top = 16
        Width = 33
        Height = 13
        Caption = 'Nome'
        FocusControl = edtNome
      end
      object Label3: TLabel [2]
        Left = 16
        Top = 56
        Width = 38
        Height = 13
        Caption = 'Estado'
        FocusControl = edtEstado
      end
      object Label4: TLabel [3]
        Left = 336
        Top = 56
        Width = 40
        Height = 13
        Caption = 'Cidade'
      end
      object Label5: TLabel [4]
        Left = 16
        Top = 96
        Width = 52
        Height = 13
        Caption = 'Dist'#226'ncia'
        FocusControl = edtDistancia
      end
      object Label7: TLabel [5]
        Left = 416
        Top = 96
        Width = 94
        Height = 13
        Caption = 'Taxa de Entrega'
        FocusControl = edtTaxaEntrega
      end
      object Label6: TLabel [6]
        Left = 240
        Top = 96
        Width = 160
        Height = 13
        Caption = 'Tempo M'#233'dio (hora:minuto)'
      end
      inherited DBGrid1: TDBGrid
        Top = 149
        Width = 701
        TabOrder = 10
        TitleFont.Name = 'Verdana'
      end
      inherited SbHints: TStatusBar
        Top = 343
        Width = 701
      end
      object btnEstado: TBitBtn
        Left = 48
        Top = 72
        Width = 25
        Height = 21
        Hint = 'Pesquisa estado.'
        Caption = '...'
        Enabled = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        TabStop = False
        OnClick = btnEstadoClick
      end
      object stEstado: TEdit
        Left = 80
        Top = 72
        Width = 241
        Height = 21
        Hint = 'Exibe o estado.'
        TabStop = False
        AutoSize = False
        Color = clBtnFace
        Ctl3D = False
        Enabled = False
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'Verdana'
        Font.Style = [fsBold]
        ParentCtl3D = False
        ParentFont = False
        ParentShowHint = False
        ReadOnly = True
        ShowHint = True
        TabOrder = 4
      end
      object edtCodigo: TDBEdit
        Left = 16
        Top = 32
        Width = 134
        Height = 21
        Hint = 'C'#243'digo do bairro'
        TabStop = False
        DataField = 'BAI_IDF'
        DataSource = DtSrc
        Enabled = False
        ImeMode = imDisable
        TabOrder = 0
      end
      object edtNome: TDBEdit
        Left = 168
        Top = 32
        Width = 524
        Height = 21
        Hint = 'Nome do bairro'
        DataField = 'BAI_NOME'
        DataSource = DtSrc
        TabOrder = 1
      end
      object edtEstado: TDBEdit
        Left = 16
        Top = 72
        Width = 30
        Height = 21
        Hint = 'Sigla do estado do bairro'
        DataField = 'BAI_ESTADO'
        DataSource = DtSrc
        TabOrder = 2
        OnExit = edtEstadoExit
      end
      object edtDistancia: TDBEdit
        Left = 16
        Top = 112
        Width = 212
        Height = 21
        Hint = 'Dist'#226'ncia em quil'#244'metros'
        DataField = 'BAI_DISTANCIA'
        DataSource = DtSrc
        TabOrder = 6
      end
      object edtTaxaEntrega: TDBEdit
        Left = 416
        Top = 112
        Width = 212
        Height = 21
        Hint = 'Valor da taxa de entrega'
        DataField = 'BAI_TAXAENTREGA'
        DataSource = DtSrc
        TabOrder = 8
      end
      object cmbbxCidades: TDBLookupComboBox
        Left = 336
        Top = 72
        Width = 353
        Height = 21
        Hint = 'Cidade do bairro'
        BevelOuter = bvNone
        BevelKind = bkFlat
        Ctl3D = True
        DataField = 'BAI_CIDADE'
        DataSource = DtSrc
        DropDownRows = 10
        Enabled = False
        KeyField = 'CID_CODIGO'
        ListField = 'CID_DESCRI'
        ListFieldIndex = 1
        ListSource = Dts_Cidades
        ParentCtl3D = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 5
      end
      object edtTempoMedio: TEdit
        Left = 240
        Top = 112
        Width = 57
        Height = 21
        MaxLength = 5
        TabOrder = 7
        OnExit = edtTempoMedioExit
        OnKeyPress = edtTempoMedioKeyPress
      end
    end
  end
  inherited DtSrc: TDataSource
    DataSet = SQLC_Bairro
    Left = 80
    Top = 8
  end
  inherited DtSrcDBGrid: TDataSource
    Left = 288
    Top = 320
  end
  object SQLC_Bairro: TSQLClientDataSet
    CommandText = 'select * from BAIRROS where BAI_IDF=:pCodigo;'
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <
      item
        DataType = ftString
        Name = 'pCodigo'
        ParamType = ptInput
      end>
    BeforeInsert = SQLC_BairroBeforeInsert
    DBConnection = DtmGeral.ConexaoBanco
    Left = 48
    Top = 8
    object SQLC_BairroBAI_IDF: TIntegerField
      DisplayLabel = 'C'#243'digo'
      FieldName = 'BAI_IDF'
      Required = True
    end
    object SQLC_BairroBAI_NOME: TStringField
      DisplayLabel = 'Nome'
      FieldName = 'BAI_NOME'
      Required = True
      Size = 40
    end
    object SQLC_BairroBAI_ESTADO: TStringField
      DisplayLabel = 'Estado'
      FieldName = 'BAI_ESTADO'
      Required = True
      Size = 2
    end
    object SQLC_BairroBAI_CIDADE: TStringField
      DisplayLabel = 'Cidade'
      FieldName = 'BAI_CIDADE'
      Required = True
      Size = 3
    end
    object SQLC_BairroBAI_DISTANCIA: TFMTBCDField
      DisplayLabel = 'Dist'#226'ncia'
      FieldName = 'BAI_DISTANCIA'
      Required = True
      Precision = 15
      Size = 3
    end
    object SQLC_BairroBAI_TEMPOMEDIO: TTimeField
      DisplayLabel = 'Tempo M'#233'dio'
      FieldName = 'BAI_TEMPOMEDIO'
      Required = True
      EditMask = '!90:00:00;1;_'
    end
    object SQLC_BairroBAI_TAXAENTREGA: TFMTBCDField
      DisplayLabel = 'Taxa de Entrega'
      FieldName = 'BAI_TAXAENTREGA'
      Required = True
      Precision = 15
      Size = 3
    end
  end
  object SQLC_Cidade: TSQLClientDataSet
    CommandText = 'select * from CIDADES where cid_estcod = :pest'
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <
      item
        DataType = ftString
        Name = 'pest'
        ParamType = ptInput
      end>
    DBConnection = DtmGeral.ConexaoBanco
    Left = 568
    Top = 104
    object SQLC_CidadeCID_ESTCOD: TStringField
      FieldName = 'CID_ESTCOD'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
      Size = 2
    end
    object SQLC_CidadeCID_CODIGO: TStringField
      FieldName = 'CID_CODIGO'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
      Size = 3
    end
    object SQLC_CidadeCID_DESCRI: TStringField
      FieldName = 'CID_DESCRI'
      Required = True
      Size = 35
    end
  end
  object Dts_Cidades: TDataSource
    DataSet = SQLC_Cidade
    Left = 600
    Top = 104
  end
end
